home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 30
/
Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso
/
Aminet
/
biz
/
dopus
/
FirstSel.lha
/
FirstSel
/
deutsch
/
Liesmich.txt
Wrap
Text File
|
1999-01-31
|
3KB
|
68 lines
Short: 2 Arexx-scripts, result is 1st selected file in dest or source-lister.
Author: okir@gmx.de (Olaf Kirstein)
Uploader: okir@gmx.de (Olaf Kirstein)
Type: biz/dopus
Diese beiden kleinen Arexx-Scripte (FirstSelDest.dopus5 und FirstSelSource.dopus5)
liefern den kompletten Pfad des jeweils ersten angewählten Files im Quell- oder
Ziellister. Ist kein entsprechender Lister vorhanden, oder kein File angewählt,
gibt es einen kleinen Fehlerrequester.
Ich habe die Scripte geschrieben, da es hiermit sehr leicht ist, in den
File-Popup-Menüs Aktionen mit angewählten Files aus anderen Listern vorzunehmen.
Definiert man beispielsweise im Funktionseditor folgendes:
AmigaDos set firstsel `rx DOpus5:ARexx/FirstSelDest.dopus5`
kann man in der Funktion mit $firstsel auf diese lokale Variable zurückgreifen.
Diese Art ist um einiges flexibler, da die DOpus-interne {v}-Variante vor
Ausführung der Funktion prüft, ob eine Variable existiert. Das ist bei lokalen
Variablen natürlich nicht der Fall, und so würde DOpus bei der Generierung des
Batchfiles im T:-Verzeichnis {v} einfach ignorieren.
Ich habe hiermit einen Dateityp für spatch von SAS definiert:
Funktion : AmigaDOS set spatchold `rx DOpus5:ARexx/FirstSelSource.dopus5 {Qp}`
AmigaDOS set spatchout "$spatchold".new
AmigaDOS spatch -o$spatchout -p{f} $spatchold
AmigaDOS unset spatchold
AmigaDOS unset spatchout
Dann wähle ich im Quelllister einfach das Originalfile an, drücke über dem
entsprechendem Patchfile die rechte Maustaste und wähle in dem Menü die obige
Patchfunktion. Es wird dann ein neues File im Quelllister erzeugt. (Spatch
wird bei vielen Updates von Shareware oder kommerzieller Software verwendet).
Installation:
-------------
Einfach die Scripte nach DOpus5:ARexx kopieren.
Benutzung:
----------
Im Funktionseditor von DOpus5 sollte man als Argument den ARexx-Port {Qp}
angeben. Wird dasArgument weggelassen, wird versucht DOPUS.1 als Port zu
verwenden.
Da die Scripte das Ergebnis nach StdOut liefern, kann man diese direkt als
Argument für das Setzen von lokalen (set) oder globalen (setenv) Variablen
verwenden. Man kann das Ergebnis auch mittels ">" in eine Datei umleiten:
AmigaDos set varname `rx scriptname {Qp}` oder
AmigaDos setenv varname `rx scriptname {Qp}`
hier sollte man möglichst mit unset bzw. unsetenv die Variablen nach Verwendung
wieder löschen.
ARexx <scriptname> {Qp} >ausgabe
leitet die Ausgabe in eine Datei um.
Verbesserungsvorschläge und Fehlermeldungen bitte per EMail an:
Olaf Kirstein okir@gmx.de